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PREFACE 


This manual describes the run-time characteristics of the 
Datapoint 2200 Series DATASHARE Interpreters- It is meant as 
reference material to the features of the individual interpreters, 
and not as a tutorial. For complete information on the DATABUS 
language, refer to the DATABUS language reference- 
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CHAPTER 1. INTRODUCTION 


DATASHARE permits the simultaneous execution of up to eight 
DATABUS programs, each dealing with its own remote Datapoint CRT 
terminal (a system option allows one of the programs to execute 
using the system console instead of a remote terminal which allows 
DATASHARE to be run without a multi-port adaptor)• The DATASHARE 
interpreter runs under the Disk Operating System (taking advantage 
of all of its file handling characteristics), handles a high-speed 
line printer or servo printer, provides indexed-sequential as well 
as random and sequential file accessing, and allows intra-file 
access, thus providing a powerful data entry and processing 
facility. This configuration allows a flexible mix of remote, 
batch, and interactive processing all under the control of a high 
level language program, enabling the user to configure the system 
to best suit his data processing needs- 

In addition, the DOS with its variety of utility and higher 
level language systems may be used alternately to DATASHARE, 
enabling processing of tasks not appropriate to the multiple 
terminal environment. 

Using virtual memory techniques, DATASHARE provides each 
program with a 16K byte area for executable statements. This, in 
combination with the ability of the compiler to accommodate over 
3400 labels, enables the user to create and use programs of over 
one hundred pages (a very large high level language program). To 
provide rapid program execution, the data area for each program is 
maintained in main memory and not swapped. Depending on the 
configuration a combined total of up to 4096 bytes of main memory 
is allocated for the combined data area of all ports configured 
into the system. The system can be configured to run with one 
through eight ports with the data area being variably partitioned 
among them (the data area of any one port can be configured to be 
from 32 bytes to almost all of the total area available). If the 
system is configured to run with port 1 on console, or with the 
servo printer, the total data area available is reduced. 

Any of the Datapoint 2200 printer systems may be connected 
the DATASHARE configuration with printing being controlled from 
any of the ports- If the printer is busy with one port, another 
port trying to access the printer will wait until the first port 
releases the printer. 

All program execution in DATASHARE occurs in the DATABUS 
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language. Terminal command interpretation is handled in special 
ANSWER and MASTER programs (unique for each port) which also 
handle system security. These programs are provided with the 
system but may be compiled like any other Databus program, 
enabling the user to completely define his own terminal command 
and security system. 

Program generation is performed under the DOS using the 
general purpose DOS editor and DATASHARE compiler- 
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CHAPTER 2. SYSTEM GENERATION 


2.1 Loading From Cassette 

The DATASHARE compiler and interpreter system programs are 
contained on one cassette. The cassette is in the DMF (DOS 
Multiple File) format which includes a directory of the files on 
the tape. All that is necessary to load the DATASHARE 3 system 
files to disk is to have the MIN program catalogued on the system 
and to keyin: 

MIN ; A 

The MIN (Multiple IN) program will be activated and will 
display the date of creation of the tape, the file names in the 
tape directory, and each file name as the file is being loaded. 

If the file already exists on the disk, the MIN program will ask 
if it is to be overstored. The operator can decide to overstore 
the file or can tell it not to overstore the file in which case 
MIN will allow the file to be stored under a different name. 
Consult the MINMOUT USER'S GUIDE for further information on its 
operation. 

The DATASHARE 3 interpreter system files can be re-named to 
any name desired as long as the command file and all the overlays 
have the same name. For example, if DS/CMD was re-named DS3/CMD, 
then DS/0V1 thru DS/0V7 would have to be named DS3/OV1 thru 
DS3/OV7. 

Since the hardware/software environment for the four 2200 
series DATASHARES is different, each one has its own rollout 
program- The four rollout programs are named ROLLOBF4 (for 
DS3A3360), ROLLOB16 (for DS3B3360), ROLL1BF4 (for DS3A3600), and 
ROLL1B16 (for DS3B3600). Since the rollout program is invoked 
from the DATASHARE interpreter by name, and the four are not 
compatable, the rollout programs must not be renamed. For syste 
that desire to support more than one type of terminal, multiple 
rollout programs may reside on the same disk. 
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2.2 Port Configuration 

The DATASHARE system may be configured to run with from one 
to eight ports. The system is configured by running the DSCON 
program. This program will first display the current 
configuration (if one has been made) and then ask if the 
configuration is to be changed. If a negative response is given, 
control is returned to the DOS. Otherwise, the DSCON program will 
run through a sequence of questions concering the number of ports, 
whether the console is to be the terminal for port one, whether 
the servo printer is to be used for the system printer, if port 
one is on the console whether the multi-port is to be bypassed 
altogether, whether the available space is to be divided evenly 
among the ports, and whether ROLLOUT is to be configured. If the 
space is to be evenly divided, the DSCON program will display how 
much space is allocated to each port. If the space is not to be 
evenly divided, the DSCON program will request the amount of space 
to be allocated to each port. The amount of space must be at 
least 32 bytes and may never be more than the total amount of 
space left. The DATASHARE system must be configured before 
running after loading from cassette. 

If the configurator is told to enable rollouts, two 
additional system files will be created: ROLLFILE/SYS to contain 
the file status and a memory image, and INTRHAND/SYS to restore 
the DOS interrupt handler which is overstored by DATASHARE. Both 
of these files are created on drive zero to prevent possible 
overstoring of identically named files on other drives that might 
contain information about a quiesced DATASHARE system. 

2.3 Necessary Programs 

Before the DATASHARE system can be used, two more sets of 
programs must exist. These are called the ANSWER and MASTER 
programs and perform the tasks of dealing with the user when he 
initially signs onto the system and dealing with him when he is 
not running another DATASHARE program. Note that all execution in 
the DATASHARE system occurs in the high level language and since 
the user writes his own ANSWER and MASTER programs, he can 
determine how the system command language appears. The ANSWER and 
MASTER programming concepts are dealt with in Chapter 4. 

If an ANSWER and MASTER program do not exist for a port, it 
will never become active even if it is configured into the system. 
The ANSWER and MASTER program must have the object names 
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ANSWERn/DBC and MASTERn/DBC where n is the number of the port for 
which these are the ANSWER and MASTER programs (n =1 thru 8). 

All ANSWER and MASTER object files must reside upon drive 0 in the 
system. If a multi-drive system is being used# it is generally a 
good idea to keep all necessary system utilities/ the DATASHARE 
system files/ and the DATASHARE object code files f as well as the 
ANSWER and MASTER program object files on drive 0 and to not 
remove the disk in drive 0 during normal system operation. 

If DATASHARE initialization cannot find an answer program 
with a name of ANSWERn/DBC/ it will then search for a program with 
the name ANSWER/DBC. Similarly/ the "second choice" master 
program is named MASTER/DBC. In this way f all ports may share a 
single answer or master program/ if desired. 

Other programs which should be on the system include the 
INDEX/ REFORMAT/ and SORT utilities for the generation of index 
files. Also/ the MINMOUT utilities should be on the system as 
they would be the programs used to dump and reload DATASHARE 
object code files to and from cassette tape. 
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CHAPTER 3. SYSTEM OPERATION 


3.1 Bringing Up the System 

If the DATASHARE 3 interpreter system files are named DS/CMD 
and DS/OV1 thru DS/OV7, then the DATASHARE system is brought up by 
entering the DOS command: 

DS 

This begins a series of operations the first of which is the 
display of the message: 

DS3xnnnn l.r - SYSTEM BEING INITIALIZED 

where r is the revision number of the particular release, x is the 
version of the DOS, and nnnn is the terminal number supported by 
this release of DATASHARE. If the DATASHARE system has not been 
configured, the message: 

* DS3xnnnn HAS NOT BEEN CONFIGURED * 

is displayed. If the configuration file cannot be found on the 
same drive the DS/CMD file is located on, the message: 

* DSCON/CMD MISSING ON DRIVE d * 

is displayed where d is the drive number 0 through 3. If one of 
the constituent overlays of the DATASHARE 3 interpreter system 
cannot be found on the same drive the DS/CMD file is located on, 
the message: 

* DS/OVn MISSING ON DRIVE d * 

is displayed where n is the overlay number (1 through 7). Of 
course, if the DATASHARE 3 interpreter system files have been 
re-named, the names in the above messages would be changed 
accordingly. If any of the above messages after the 
initialization message is displayed, the machine will beep and 
halt. If the auto-restart tab is punched on a rear cassette 
containing the DOS bootstrap loader, then this action will cause 
control to return to the DOS. Otherwise, the RESTART key must be 
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pressed to cause the machine to run again. If the initialization 
is completed successfully, the system displays the message: 

OPERATOR, PLEASE DEPRESS THE KEYBOARD OR DISPLAY KEY. 

This action will verify that an operator is present. A design 
objective was that the time and date be initialized by the 
operator when the system was brought up but that the system also 
be capable of bringing itself up in the case of power failure and 
unattended operation. If the keyboard or display key is not 
depressed within 30 seconds after the message is displayed, the 
machine will make a series of one second warbles in an effort to 
attract the attention of any operational personnel within the 
vicinity. If the keyboard or display key is not depressed after 
30 seconds of beeping, the system assumes that it is being 
operated in an unattended mode and should start operation without 
the time and date being initialized. In this case, the time and 
date entries at the upper right of the 2200 screen will be blank. 

If the time and date are to be initialized, the operator must 
depress either the keyboard or display key. Upon doing this, the 
screen will be initialized with a message indicating the release 
of the DATASHARE system being used, the number of ports configured 
for that system, and the digits one through eight running down the 
left side of the screen. These digits denote a line which is 
allocated for each physical port. The CHAIN statement displays on 
this line the name of the program being invoked. The program 
running for that port may also display on this line using the 
CONSOLE statement. These lines are useful for informing any 
operational personnel of the status of the system. 

To initialize the time and date, the system will display the 
message TIME: in the upper right part of the screen. The operator 
should respond to this with a four digit number indicating the 
current clock value in hours and minutes (HHMM). Note that no 
colons should be entered and that a valid 24-hour clock value must 
be entered. If the value is not valid, the TIME: message will be 
repeated. Otherwise, the system will display the message DATE: to 
the right of the time value just entered. The operator should 
respond to this with a three digit number followed by a slash 
followed by a two digit number. The first number should be the 
current julian date (a number between 1 and 365 or, on leap years, 
366) and the second number should be the last two digits of the 
current year. Note that the format mentioned must always be 
followed, with leading zeros used if necessary. If the julian 
date is not valid, the DATE: message will be repeated. Otherwise, 
the system will begin execution as denoted by the wall clock 
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display running in the upper right part of the screen- The system 
will then look look up all of the ANSWER and MASTER program names 
in the DOS directory and stores their physical file numbers away 
in a table. Ports requesting connection during this time will be 
connected but no response will be made until all of the programs 
have been initialized. Note that an asterisk just to the right of 
the port number at the left side of the screen will be displayed 
if the Carrier Detect signal for that port is present- 

If the system is configured to run port one on the consoler 
an alternate form of bring up the system may be used. Instead of 
entering the simple DOS command DS to start the system; the 
operator can enter: 

DS <program> 

where <program> is the name of a DATASHARE object code file on 
drive zero. If this action is takenr the file <program>/DS3 will 
be used for the answer program for port one instead of 
ANSWERl/DS3. The master program for port one will still be 
MASTER1/DS3. Also# the operator will not be requested to depress 
the KEYBOARD or DISPLAY keys and to enter the time or date. The 
time and date will be initialized to 00:00 and 000/00 respectively 
and execution will start immediately. Note that the console 
screen is blanked just before execution is begun if port one is 
being run on the system console. If one wishes to simply bypass 
the time and date entry; he can enter the command: 

DS ANSWER1 

which will allow the normal answer program to be executed for port 
one but will eliminate the request for the time and date. This 
feature makes it possible to run DATASHARE from the CHAIN program- 
To return from DATASHARE to the chaining process; a ROLLOUT must 
be performed with the DOS command: 

CHAIN/OVl 

given which will cause the CHAIN command to pick up after the last 
command issued. Normally; if a single DATASHARE program is to be 
run in a batch mode (only one port) the program should be execut 
using the DATABUS system; since throughput is very much higher. 

The DATASHARE interpreter system can be caused to 
automatically execute when the DOS is brought up by the use of the 
AUTOKEY/CMD program- DATASHARE 3 has been changed over DATASHARE 
2 to look in the DOS command line to determine the name of the 
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command file so the overlay names can be determined (this is what 
allows the DATASHARE 3 interpreter system files to be re-named). 
Because of this, the standard DOS AUTO program can no longer be 
used to directly cause automatic execution of the DATASHARE 3 
interpreter system- There are a number of DOS programs which use 
the same technique of looking into the DOS command line so a 
general solution to the problem of not being able to automatically 
execute these programs was implemented. 


3-2 Taking Down the System 

The DATASHARE system maintains its files totally under the 
control of the DOS- The DOS normally may be halted at any time 
without detriment to the file structure. However, halting the 
system after a new file has been created or after a new segment 
has been allocated will leave that file with the maximum amount of 
space allocated to it. Proper closing of the file collapses the 
space allocated to only that used. Thus, to be sure all files are 
properly closed, the system should be halted when all ports are in 
their MASTER programs. The operator can tell from the console 
screen when a port is in its MASTER program if the MASTER program 
displays its name as in the examples in Appendix C. 

3.3 Fatal Error Conditions 

There are error conditions within the DOS which cannot be 
trapped. These errors envoke a DOS overlay called the ABORT 
overlay which reloads the DOS to insure the presence of the DSPLY$ 
routine, displays an error message in the standard DOS format, and 
then returns control to the DOS command interpreter. Note that 
this sequence does not provide for restoring the foreground 
interrupt handler or insuring that the DOS does not overlay an 
interrupt process that happens to be running. The DATASHARE 
foreground routines reside in an area which is overlayed by the 
DOS and, therefore, the normal abort message routine would cause 
havoc when it tried to load the DOS. For this reason, the 
DATASHARE system overlays the DOS in a critical place that allows 
it to trap the action of DOS errors and store a return instruction 
in location zero. This effectively disables any interrupt handler 
execution and allows the DOS to be loaded for the abort message 
display but does not restore the normal DOS foreground interrupt 
handler. The DATASHARE system also overlays the DOS EXITS entry 
point with a jump to a beep and halt. This causes the machine to 
halt when the untrappable error message display is completed. 


3-4 


2200 DATASHARE 3 



CHAPTER 4. ANSWER AND MASTER CONCEPTS 


There are two DATABUS programs which must exist for each port 
for that port to be active. The first is called the ANSWER 
program and must have a name of ANSWERn where n is the number of 
the port. For example, ANSWER1 for the first port, ANSWER2 for 
the second, and so on* The ANSWER program deals with the user 
when he initially connects to the system (calls on the telephone 
or turns on his CRT). The second program is called the MASTER 
program and must have a name of MASTERn where n is the number of 
the port. The MASTER program deals with the user whenever he is 
not executing the ANSWER program or an application program and is 
generally used to allow the user to select the next application 
program he wishes to execute. Note that both of these programs 
are written in DATABUS, enabling the user to tailor the command 
aspects of the DATASHARE system to his particular needs. Simple 
and complex examples of ANSWER and MASTER programs are shown in 
the appendices. Remember that the object code for all ANSWER and 
MASTER programs must reside on drive 0. 

4.1 System Security 

The ANSWER program allows the programmer to force the user to 
give some type of identification before he is allowed to use the 
system. Note that the INTERRUPT key on the terminal is ignored 
while execution is taking place between the time when the system 
first acknowledges the presence of a user at a given port and the 
first chain executed by the program for that port. This means 
that while the user is executing in the ANSWER program for a given 
port when he first signs onto the system, he may not escape around 
the identification request and get directly into the MASTER 
program by simply striking the INTERRUPT key. The ANSWER program 
may also be structured to enforce file access limitations 
depending upon the identification of the user. 

4.2 System Convenience 

The ANSWER program chains to the MASTER program which usual' 
requests from the terminal operator the name of the program he 
wishds to execute. This name can be generated from information 
supplied by the terminal operator so, for example, the operator 
may enter the number of a form and the MASTER program will decide 
which program to execute for that form number. The DOS directory 
cannot be directly accessed by the MASTER program, implying that a 
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file must be generated which contains the names of programs and 
files that are to be accessed if directory service or file access 
limitation is to be implemented- It is very much up to the author 
of the ANSWER and MASTER programs to provide any convenience 
facilities to the terminal user- 

4-3 Sample Answer and Master Programs 

Appendix C contains examples of both simple and complex 
ANSWER and MASTER programs. Each program is edited for entry of 
the appropriate port number in the variable PORTN and then 
compiled for the given port- This procedure (editing in the port 
number and then compiling into an object file with the port number 
in its name) must be followed for each port that is to be used in 
the system. If a DATASHARE object file for either the ANSWER or 
MASTER program does not exist on drive 0 for a given port, the 
port will simply not be activated when the system is brought up. 

The simple ANSWER program displays on the terminal the number 
of the port and displays its program name on the console. The 
latter action is performed because the system does not display the 
name of the program invoked when the chain was caused by action 
other than the execution of a CHAIN statement (e-g., the ANSWER 
program initiated by terminal connection or the MASTER program 
initiated by a STOP or INTERRUPT key). The system does display on 
the console line allocated for the executing port the name of all 
programs invoked by the CHAIN statement. The simple ANSWER 
program then requests an identification and checks it for validity 
against a very simple rule (the identification given must be 
exactly the word DATAPOINT). If the word matches (note the use of 
both the NOT EQUAL and LESS conditions for checking for an exact 
match), a STOP statement is executed which causes a chain to the 
MASTER program. Otherwise, an indication is given that the proper 
identification was not entered and another request for 
identification is made. 

The simple MASTER program merely requests the name of a 
program to be executed. A CHAIN is executed to the name given and 
if a chain failure occurs an indication is given that the name 
does not exist in the DOS directory and another request for a 
program name is made. Note that both the ANSWER and MASTER 
programs are written without the use of cursor positioning in the 
KEYIN and DISPLAY statements to aid in Teletype terminal 
compatibility. 

The MASTER program should not assume any common data areas 
since it can be entered due to a program trap or the INT key being 
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struck. For this reason/ if a common data area value is to be 
determined (such as the port number) this should be done in the 
MASTER program and not in the ANSWER program. 

The complex ANSWER and MASTER programs perform tasks similar 
to those performed by the simple programs except that a number of 
convenience features are added to give the system the appearance 
of a more conventional time sharing system. Two files are 
associated with the more complex programs, the SYSFILE and the 
DAYFILE (system and day files). The system file contains 
identification code information and a table associating a given 
identification code (user) with a given set of programs (user's 
directory). The system file also contains a record for each 
physical port (records zero through seven) which allows any 
executing program to determine which user identification is 
associated with the given physical port at any given time- A user 
identification number (an index into the rest of the file from 
which the actual symbolic user identification can be obtained), 
the time at sign on, and the date at sign on are recorded in this 
record* The remainder of the file contains four records for each 
user identified in the system* Each record is broken into ten 
ten'-character fields. The first field of the first record is the 
identification code. The rest of the fields in the first record 
and the following three records contain program names associated 
with the given user identification- The list of program names is 
terminated by a space appearing in the first column of the name- 
The list of user identifications is terminated by a space 
appearing in the first column of a user identification. 

The second file associated with the complex ANSWER and MASTER 
programs is called the day file. This file simply contains a set 
of records to be displayed at sign on time. This information is 
used to inform users of changes in the system or any other facts 
pertinent to the use of the system. Note that both of these files 
must exist before the complex ANSWER and MASTER programs can be 
used. The files can be created with DATASHARE if simple ANSWER 
and MASTER programs exist. 

The complex ANSWER program determines the month and day of 
the month from the julian date. It detects if the date has not 
been initialized by noting that the julian date is zero (an 
invalid initialization value). After the date is displayed, a 
request is made for an identification code. The identification 
code list in the system file is then scanned for a match with the 
one supplied. If a match cannot be found, an indication is given 
to the user and the request for identification is repeated. Note 
that only three tries at identification are allowed in an effort 
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to prevent unauthorized access to the system via the technique of 
trying identification codes until one is struck. After the third 
try, the response to the user does not change but he is not 
allowed access to the system even if he does then enter a valid 
identification and an alert message is displayed on the console to 
alert the operator that someone who apparently does not know an 
identification code is trying to access the system. If a valid 
identification is entered within three tries, the identification 
index into the system file, the date of sign on, and the time of 
sign on are written in the record in the system file corresponding 
to the physical port being used and execution is passed to the 
MASTER program via the STOP statement. 

The complex MASTER program allows a number of commands as 
explained in the KEYIN statement under the label HELPI• This 
particular program does not limit program or file access to a 
given user to his programs only, but such a scheme could be 
implemented without much difficulty. 

Note that when the ANSWER program is chained to it will 
execute until the first KEYIN, DISPLAY, or CONSOLE statement is 
executed. The ANSWER program is actually executed when the 
terminal disconnects from the system, not when it connects to it- 
If the time of connection and disconnection and total connection 
time are being kept in a file, the ANSWER program can note when a 
user disconnects from the system and log the total amount of time 
the user was connected as the first operations in the ANSWER 
program. Then the KEYIN statement requesting a new user 
identification can be issued which will cause execution to cease 
for that port. The log out function will be executed when the 
terminal disconnects from the system. When the terminal 
re-connects to the system the KEYIN statement will be satisfied 
when the operator at the terminal enters an identification code at 
which time the new user can then be logged on with the time being 
noted in the log file. Note that when the system is initialized, 
all ports will appear to be logging off (since all ANSWER programs 
are executed) but no corresponding log on time will be set. The 
program must handle this special case by allowing for log offs 
without corresponding log on times. 
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CHAPTER 5. PHYSICAL SYSTEM CHARACTERISTICS 


5-1 Virtual Memory 

To achieve a reasonable amount of program space for eight 
simultaneous programs, DATASHARE employs a virtual memory 
technique. DATASHARE code is very compact, with very few bytes of 
instructions being capable of invoking a large amount of processor 
activity. Therefore, the rate at which DATASHARE program bytes 
are fetched is very low. Because of this low rate, the actual 
program code bytes can be kept in the randomly accessible disk 
buffers with very little effect on program execution speed. 

Another characteristic of DATASHARE object code is that it is 
reentrant. Since this means that code is never modified, program 

code need only be read from disk, and never written back. In 

addition, more than one task can be executing a section of 
DATASHARE code at one time, permitting the available address space 
to be shared among the ports, instead of being partitioned (which 
could give as little as 93 bytes per port). 

A different story exists in the case of the program data, 
however. This data is accessed at a very high rate and must be in 
main memory to be effectively accessible by the DATASHARE 
interpreter. For this reason the program data for all programs is 
kept resident in main memory, which is divided among the ports 
configured. This fact will be shown later to have further 

advantages in the case of port and printer I/O. 

To implement an effective virtual memory accessing algorithm, 
the program code is kept on the disk as 250 byte pages- Each time 
a byte of DATASHARE object code is fetched by the interpreter, a 
check is made to determine if the byte is immediately available or 
if the page containing the byte must be read in from disk. 

Because the time required to read a page of code from disk is very 
much larger than the average fetch time for a byte in a page 
already in a buffer, the DATASHARE programmer can make his program 
run much more effeciently, in many cases, by forcing his code to 
cross as few page boundaries as possible. The paging scheme used 
is purely demand with the least recently used page being destroyed 
to make space for the new page. (For a discussion of demand 
paging, refer to Computing Surveys , Volume 2 .' Number 3. "Virtual 
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Memory".) 

The DATASHARE programmer can assume that each time he crosses 
a page boundary, a new read will occur. This read can cause delay 
in the execution of the program. This time is time that cannot be 
used by any other program since the disk is busy. By causing an 
excessive number of page boundary crossings, the programmer can 
easily cause his program (and others) to execute very slowly. For 
example, a page of DATASHARE code that calls twenty different 
subroutines each in a different page will cause servere system 
degredation. 

An instruction called TABPAGE exists in DATASHARE to aid the 
programmer in making his execution speed as high as possible. 

This instruction causes the location counter in the compiler to be 
incremented until it is at the start of the next page (nothing 
will be generated if the location counter is already at the start 
of a page). When this instruction is executed, it causes a GOTO 
to the start of the next page. By using this instruction, the 
programmer can cause logical parts of his program to contain as 
few page boundaries as possible. 

Another way to increase execution speed is to use in-line 
coding as much as possible, especially for short operations, 
instead of the subroutine calling feature if the subroutine is 
located in a page different from the calling location. This is 
economically feasible because of the large space available for 
each program (16K bytes). 

Of the four DATASHARE interpreters available for the 
Datapoint 2200, two are the "A" series (DS3A3360 and DS3A3600), 
and two are the "B" series (DS3B3360 and DS3B3600). The 
difference between the two series reflects the additional hardware 
features available with the 9370 series disk drives and DOS.B 
(hence "B"). Because the disk controller has 4K of buffer instead 
of IK as on the 9350 series, the working set of the "B" series 
interpreters is much larger. Up to 13 pages of object code can be 
resident at one time, greatly reducing the rate of page faulting 
over the "A" series interpreters. 

Since both series of interpreters access the disk controller 
only through the DOS routines, there are DOS independant. 

However, it is not possible to run the "B" series interpreters on 
the 9350 disk controller due to hardware limitations. This 
restriction does not work the other way around, and the "A" series 
interpreters will run on DOS.B and the 9370 disks, albeit at 
considerably reduced performance. 
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5.2 Major Modules 


Approximate memory map of the DATASHARE interpreter system 


+ + + + + + + + + + + + + + + + + 
+ 

+ 

+ USER PROGRAM DATA AREA 
+ 

+ 

+ 

+ + + + + + + + + + + + + + + + + 
+ 

+ INTERPRETER 
+ 

+ + + + + + + + + + + + + + + + + 
+ 

+ SCHEDULER 
+ 

+ + + + + + + + + + + + + + + + + 
+ 

+ STATH 
+ 

+ + + + + + + + + + + + + + + + + 
+ 

+1/0 BUFFERS 
+ USER INTERPRETER DATA 
+ WORKING STORAGE 
+ 

+ + + + + + + + + + + + + + + + + 
+ 

+ D 0 S 
+ 

+ + + + + + + + + + + + + + + + + 


+ + + 
+ 
+ 
+ 
+ 
+ 
+ 

+ + + 
+ 
+ 
+ 

+ + + 
+ 
+ 
+ 

+ + + 
+ 
+ 
+ 

+ + + 
+ 
+ 
+ 
+ 
+ 

+ + + 
+ 
+ 
+ 

+ + + 


037777 


030000 


017600 


012600 


010000 


005400 


000000 
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As seen in the map on the previous page, DATASHARE is broken 
into several major modules- The area between 0 and 05400 contains 
all of DOS that is used by DATASHARE. This includes the file 
loader, basic sector read and write routines (used by the 
interpreter), and file handling routines. 

The area between 05400 and 010000 is used for the interpreter 
working storage for each port, I/O port buffers, and printer 
buffers. When a particular user is executed, the areas 
corresponding to his interpreter working storage are swapped into 
the interpreter working storage areas. When he stops execution 
(swapped out for another user to execute), all of this information 
is swapped back into his area between 05400 and 010000. 

The area between 05400 and 010000 is the main working storage 
page for the DATASHARE interpreter. The most actively accessed 
data is kept within a single page of memory, increasing coding 
effeciency and system throughput. 

The STATH (STring AriTHmetic) package used with the DATASHARE 
3 system has been revised to require much less space than the 
package for previous DATASHARE systems- This reduction was 
effected by grouping functions into subroutines and by taking out 
the multiplication table. Multiplication now takes approximately 
the same amount of time as division. 

The DATASHARE scheduler is the most complex part of the 
system. Its task involves all foreground I/O and scheduling of 
background execution. Background execution is used to interpret 
and execute the DATABUS statements and perform disk I/O while 
foreground execution is used to interpret the printer, console, 
and terminal I/O statements. This portion of the system is 
explained mote thoroughly in the next section. 

The DATASHARE interpreter is similar to a standard DATABUS 
interpreter except that it has been modified to deal with multiple 
user data areas. A page address table exists in the working 
storage area which tells the interpreter where on the disk the 
user's program resides. A virtual storage technique (demand 
paging) is used which uses disk buffers for the storage of the 
currently active program data pages. The replacement algorithm 
used is a circular Least Recently Used list, sometimes called 
FIFO. 


DATASHARE object code files are structured so that the most 
significant byte of the DATABUS interpreter program address 
counter indicates which sector relative to the beginning of the 
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object file and the least significant byte of the address counter 
indicates which byte within that sector is being accessed. The 
first sector of the object file contains the number of bytes that 
are used for user variable data storage. If this number is 
greater than the number of bytes of data area allocated to the 
particular user the program will not be loaded if a CHAIN 
operation to it is attempted. 

In addition, the DATASHARE compiler includes information 
indicating the maximum address of executable program code. Since 
the 2200 series DATASHARE's have a maximum of 16K executable 
address space, programs using more will not be loaded during a 
CHAIN operation. Note that the programmer cannot distinguish 
between a program actually absent from the DOS directory and a 
program which has too large a data or program area to fit into the 
space allocated to the port trying to load the program. 

If the data area will fit in the space allocated to the port, 
the data area bytes are read into the user's variable data area- 
Bytes of value 0376 (octal) are not loaded into memory but their 
slots are skipped. This mechanism allows common variables to be 
positioned non-destructively- 

5.3 Scheduling 

To provide optimum response time, DATASHARE handles all port 
and printer I/O using interrupt driven foreground routines, which 
means that data transfer between the terminal and the system can 
occur regardless of the computational task being handled by the 
background program at any given time. The foreground routines 
actually interpret the KEYIN, DISPLAY, PRINT, and CONSOLE 
instructions, with the background interpretive code merely passing 
these instructions to the foreground through a circular buffer 
allocated for each port. 

Conventional systems use such a buffer to hold the actual 
characters transferred between the system and the terminal. 
DATASHARE uses this buffer to hold the interpretive code bytes, 
thus enabling many more bytes to be transferred than can actually 
be held in the buffer. For example, a DISPLAY statement may 
contain some quoted information and then a variable name. The 
variable name is represented by two bytes but the contents of the 
variable could be fifty bytes long, enabling two bytes of buffer 
space to invoke the transfer of fifty bytes to the terminal. This 
is made possible by the fact that all program data is resident in 
main memory. 
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The foreground and background program for a given port always 
execute exclusively of each other to prevent conflicts over data 
values. When the background program executes a DISPLAY statement, 
the statement is stored in the buffer for the given port and then 
the background program relinquishes control to the foreground 
program. When foreground has completely executed the I/O 
statement, it causes a high priority interrupt to background, 
which causes a task switch to the program that was executing the 
DISPLAY statement. 

One important consideration which must be taken into account 
by the DATASHARE programmer concerning port I/O is the fact that 
every time an I/O instruction is completed in the foreground, the 
background program is swapped in. If the programmer is not 
careful, he can cause the system to spend most of its time 
swapping background programs in instead of doing useful work. An 
example would be using many separate DISPLAY statements instead of 
one long continued statement. 

The above discussion concerns only port, printer, and console 
1/0. All disk I/O is performed under the DOS which is a 
background-only operation. This means that all DOS functions are 
non-interruptable and long directory searches (which can take 
considerable time) will cause the response to I/O completion 
interrupts to be delayed. Long DOS functions, however, occur 
infrequently and are ignored from an average response time 
calculation standpoint. 

When the background program resumes:execution due to the 
completion of a foreground I/O task, it is guaranteed a minimum 
amount of execution time. This prevents the system from spending 
all of its time swapping background tasks when the foreground I/O 
completion rate is high. A worst case program (one interrupt 
every two bytes fetched) can load the system to the point where a 
background only port will simply not be dispatched. This occurrs 
with approximately five ports running the worst case program. 

These results were made in tests to determine the effect of 
servere I/O loading on the system, and such worst case programs 
are exceedingly rare- 

5.4 Terminal Devices 


DATASHARE is capable of driving any serial terminal device 
which uses an ASCII character set. Use of devices without cursor 
positioning features, however, will restrict the programmer from 
using the cursor positioning facility in the KEYIN and DISPLAY 
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statements. If the programmer does not use the cursor positioning 
feature, he will be able to write a program which is Teletype 
machine compatible. The *ES and *EL list controls send control 
characters that are ignored by a 35 ASR Teletype. The Cursor On 
character which is sent before each KEYIN variable entry request 
and the Cursor Off which is sent after the ENTER key is struck, 
are Tape On and Tape Off respectively on a 35 ASR Teletype. 

DATASHARE is also capable of dealing with 103 type datasets 
as well as hard wired connections and full duplex four wire 202 
dataset connections. It handles all of the 103 handshaking 
involved and needs only the proper cable to work correctly. In 
fact, the 3500 or 3601 hard wire cable is connected in such a way 
as to make the 3500 or 3601 appear as a 103 data set, with power 
on causing ring detect and carrier detect to be sent to the 
DATASHARE system. The fact that a hard wire or dataset connection 
is employed at a given terminal cannot be differentiated by the 
DATASHARE programmer. See Chapter 6 for more information 
concerning terminal connections. 

Two DATASHARES are available supporting the 3360 CRT Terminal 
(3500). These are DS3A3360 and DS3B3360. Since the 3500 
terminals do not have a lower case capability, *IN and *IT KEYIN 
controls are ignored. The 3500 terminals do not have the rollup 
feature, and the *R control is also ignored. Both of these 
features are available on the two DATASHARES that support the 3600 
CRT Terminal, DS3A3600 and DS3B3600. 
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CHAPTER 6. PHYSICAL INSTALLATION 


6-1 Main peripherals 

The DATASHARE system requires a disk peripheral- Since the 
system maintains its entire file structure under the DOS, anywhere 
from one to four logical disk drives Note that drive zero must be 
kept on line at all times during system operation but the other 
three drives may be put on or off line as the maintenance of the 
data base requires. 

Note that, as in any 2200 installation, a 9420 parallel 
interface with an address of 0303 may be connected to drive a 
special output device, but that device must be capable of handling 
the output that would normally be given to an ASCII printer. 

Besides the disk, the other required peripheral for the 
operation of the DATASHARE system is the 9460 Multiple Port 
Communications Interface. In the following discussions the 
mention of a 9460 will imply that a 9462 will work as well. As 
far as DATASHARE is concerned, the 9460 and 9462 are equivalent. 
These devices are capable of driving up to eight fully independent 
full duplex asynchronous lines at speeds ranging from 110 to 9600 
baud- The DATASHARE system is not capable of output above 125 
characters per second per port and normally uses 1200 baud for 
direct connection and four wire 202-type modem connections and 
uses 300 or 110 baud for 103-type modem connections. However, any 
speed may be strapped in the 9460 to achieve compatibility with 
specific terminals as the occasion may require. Note that all 
ports are operated by the DATASHARE system in full duplex mode 
only. 


6-2 Terminal connections 

In general, a terminal may be connected to the DATASHARE 
system in one of three ways: direct hardwire, 103-type modem, ar 
202-type modem. The following table shows the pin assignments oa 
the 25-pin connector for the 9460 individual port, the 3502 CRT 
terminal, and a 103 or 202 type modem: 
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PIN 


103/ 2Q2 


1 

2 

3 

4 

5 

6 

7 

8 


9460 


3501 


DATA OUT 
DATA IN 
REQ TO SEND 
CLR TO SEND 

SIG GROUND 
CARRIER DET 


PROT GROUND 
DATA OUT 
DATA IN 


SIG GROUND 


PROT GROUND 
DATA IN 
DATA OUT 

REQ TO SEND (202) 
CLR TO SEND 
DATA SET READY 
SIG GROUND 
CARRIER DET 


20 DATA TERM RDY DATA TERM RDY DATA TERM RDY 

22 RING DETECT - RING DETECT 


The DATASHARE system goes through the following handshaking 
procedure when a connection is established: 

1. Clear Data Terminal Ready and Request To Send 

2. Wait for Ring Detection 

3. Set Data Terminal Ready and Request To Send 

4. Wait up to 10 seconds for Carrier Detect 
5- Go to step 1 if time out in step 4 

6. Wait one second and then start the ANSWER program 

This procedure will work with any of the three types of 
connections if the proper cable is used. 

DIRECT 


Basically, the direct connection cable swaps the data wires 
(pins 2 and 3) and connects Carrier and Ring Detect on one end to 
Data Terminal Ready on the other as shown in the following table: 

9460 TO 3502 OR 3601 CABLE CONNECTIONS 


9460 3502 3601 


1-1 

2 3 4 

3 2 2 

7 7 3 

8,22 20 12 


Note that this arrangement requires only five wires in the cable 
(four if the optional wire is not used). If the cable is to be 
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made more than several hundred feet long/ each of the two signal 
wires (the ones connecting to pins 2, 3 , and 4) should be twisted 
separately with a ground wire (no other shielding is necessary). 
Direct connections up to one thousand feet may be made if the 
above precautions are followed. 

The 3502 sets Data Terminal Ready whenever it is running. 
With the above cable connected/ this will cause ringing and 
carrier to be presented to the 9460. This has the effect of 
causing the ANSWER program to be executed whenever power is 
applied to the 3502. 

103 - TYPE MODEM 

The 9460 can be connected to a 103-type modem with a one to 
one cable (e.g., a pin at one end is connected to a pin of the 
same number at the other end). Only pins 2 , 3, 7, 8, 20/ and 22 
need to be connected but having all pins connected will also work 
(this being the simplest to describe to someone at a distance!). 
Note that 103 and 113B modems have similar pin connections. 

9460 TO 103 - TYPE MODEM CONNECTIONS 
9460 103-TYPE MODEM 


2 2 

3 3 

7 7 

8 8 

20 20 

22 22 

If one is calling a 103-type modem over a dial-up network, he 
will hear the telephone answered very shortly after it starts 
ringing (should take one or two rings at most). If the telephone 
is not answered within that amount of time, the caller either has 
the wrong number or the DATASHARE system is not up or is in the 
initial phase of being taken down. In any case, the caller may as 
well hang up (letting the phone ring for a long time can be very 
irritating at the other end). If the telephone is answered, the 
caller will hear the carrier from the modem connected to the 94f 
which is his signal to either depress the DATA key on his modem ox- 
put the telephone handset in the data coupler (if he is using 
one). The DATASHARE system gives the caller ten (10) seconds to 
perform the necessary action to cause a carrier to be returned 
from his modem. If all is satisfactorily completed, one more 
second will pass and then the ANSWER program will begin execution- 
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If all is not satisfactorily completed, the DATASHARE system will 
hang up the telephone at its end and go back to waiting for 
ringing to occur. Note that since the DATASHARE system does wait 
up to ten seconds for a satisfactory connection, if one dials the 
system and hangs up as soon as the telephone is answered, he will 
have to wait ten seconds before he can dial the same telephone 
again- Also note that the DATASHARE system will disconnect as 
soon as it loses the Carrier Detect signal from the modem. This 
means that disconnection will occur even if the carrier is broken 
only for a very short time. 

202-TYPE MODEM 

The DATASHARE system requires a full duplex connection to its 
terminals- A 202-type modem can be used * in this fashion only if 
it is connected via a four-wire circuit. This means that one 
signal path must exit for data flow in one direction and a 
separate data path must exit for data flow in the other direction- 
This implies that a point-to-point connection is made between the 
modems (the switched telephone network cannot support four-wire 
connections). In this application, the 202 modem must be strapped 
for use in four-wire mode. 

The connecting cable between the 9460 and 202 modem is 
similar to the one for connection to a 103-type modem except that, 
since 202's used in point-to-point four-wire service do not use 
ringing, the carrier detection signal from the 202 must be 
connected to both the carrier detection and ring detection inputs 
on the 9460. 

9460 TO 202 MODEM CONNECTIONS 
9460 202 MODEM 

2 2 

3 3 

4 4 

7 7 

8 and 22 8 

20 20 

When Data Terminal Ready is supplied by the terminal device 

to the remote 202 modem, that modem will turn on its carrier. 

This carrier will cause the modem connected to the 9460 to turn on 
its carrier detect signal which will present ring detection and 
carrier detection to the DATASHARE system- The system will 
proceed to set its Data Terminal Ready signal which will cause the 
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2 02 modem to turn on its carrier and complete the connection* Gknse 
second later the ANSWER program will begin execution- Thus, 
operation over a 202 modem connection will appear similar to 
direct connection operation. 

Remote modems are connected to Datapoint 3000 series 
terminals via a standard modem cable supplied with the terminal. 
This cable provides the required Data Terminal Ready signal to 
cause the operational characteristics described above. 

6.3 Port speed selection 

The 9460 Multiple Port Communications Adaptor is software 
programmable to transmit and receive from five to eight 
information bits with either one or two stop bits- However, the 
DATASHARE system always uses eight information bits and sends two 
stop bits (it will receive signals with only one stop bit). The 

speed of each port may be set independently to a variety of 

speeds, depending on field programmable hardwire straps. 

There are three clock buses within the 9460, limiting the 
total number of different speeds used at any one time to three. 
Each of these buses can be connected to one of two crystal 
controlled time bases- Each time base is connected to a binary 
dividing chain, giving speeds selectable in powers of two. The 
standard crystals supplied provide multiples of 110 and 300 baud. 
The baud rate of a bus is set by strapping from a baud rate source 

pin to a baud rate bus input pin- Each bus has eight baud rate 

output points. The baud rate of a channel is set by strapping 
from a baud rate bus output point to the channel baud rate input 
pin- The following table gives the respective pin numbers as 
found on the silk screening on the printed circuit card in the 
9460: 
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BAUD RATE 

SOURCE 


BAUD 

RATE BUS 

Baud rate 

Pin 

BUS 

Input Output 

300 

E29 

1 

E34 

E37 

600 

E28 

2 

E35 

E38 

1200 

E27 

3 

E36 

E39 

2400 

E23 




4800 

E22 

CHANNEL BAUD RATE INPUT 

9600 

E21 

Channel 

Input 

110 

E33 

1 


E13 

220 

E32 

2 


El 4 

440 

E31 

3 


E15 

880 

E30 

4 


El 6 

1760 

E26 

5 


E17 

3520 

E25 

6 


El 8 

7040 

E24 

7 


E19 



8 


E20 


A typical installation may use baud rates of 110 for teletype 
machines (remote or local), 300 for remote 3502 terminals using 
103-type modems, and 1200 for remote 3502 terminals using 202-type 
modems. For this installation, one may connect bus 1 for 110 
baud, bus 2 for 300 baud, and bus 3 for 1200 baud as shown in the 
following table. 

E34 to E33 make bus 1 110 baud 

E35 to E29 make bus 2 300 baud 

E36 to E27 make bus 3 1200 baud 

Now, if channels 1 through 3 are to be 300 baud, channels 4 
through 7 1200 baud, and channel 8 110 baud, the following 
connections would be made: 

E38 to E13, E14, E15 make ch 1-3 300 baud 

E39 to El6, El7, E18, E19 make ch 4-7 1200 baud 

E37 to E20 make ch 8 110 baud 

Port speeds other than multiples of 110 or 300 baud can be 
accommodated by changing the crystal frequencies. Selection of 
the proper crystal should be aided by the Datapoint engineering 
staff. 
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6.4 Non-3502/3601 terminal devices 

Terminals other than the Datapoint 3502/3601 can be connected 
effectively to the DATASHARE system. The major advantage of these 
terminals is that its cursor can be positioned directly by the 
issuance of a three character sequence. This allows the usage of 
the cursor positioning list controls in the DISPLAY and KEYIN 
statements and greatly enhances the speed of form displays. 

Terminals such as the Teletype 33 and 35 KSR or ASR may be 
connected either hardwire or over modem connections. In addition, 
conventional CRT terminals such as the Datapoint 3300 (for 300 or 
1200 baud) or Datapoint 3000 (for 300 baud only) may be connected- 
All Datapoint 3000 series terminals use identical cable 
configurations for a given type of installation. The key to 
making a cable for a given device is to insure that both Carrier 
and Ring Detect on the 9460 are connected to a wire that is set 
when the connection is to be established and is cleared when the 
connection is to be broken. 
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APPENDIX A. INSTRUCTION SUMMARY 


SYNTACTIC 

condition 

character 

event 

list 

name 

label 

nvar 

nval 

nlit 

svar 

sval 

slit 

nlist 


DEFINITIONS 

The result of any arithmetic or string 
operation: OVER, LESS, EQUAL, ZERO, or 
EOS (EQUAL and ZERO are two names for the 
same condition). 

string Any string of printing ASCII characters. 

The occurrence of a program trap: PARITY, 
RANGE, FORMAT, CFAIL, or 10. 

A list of variables or controls appearing 
in an input/output instruction. 

Any combination of letters (A-Z) and 
digits (0-9) starting with a letter (only 
the first eight characters are used). 

A name assigned to a statement. 

A name assigned to a statement defining a 
numeric string variable. 

A name assigned to an operand defining a 
numeric string variable or an immediate 
numeric value. 

An immediate numeric value. 

A name assigned to a statement defining a 
character string variable. 

A name assigned to an operand defining a 
character string variable or a quoted 
alphanumeric character. 

An immediate character string, enclosed 
in double quotes (")• 

A series of contiguous numeric variables. 
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slist 


A series of contiguous string variables. 


rn A positive record number ( >= 0) used to 

randomly READ or WRITE on a file. 

seq A negative number ( < 0) used to READ or 

WRITE on a file sequentially. 

key A non-null string used as a key to 

indexed accesses. 

null A null string used as a key to an indexed 

read. 


FOR THE FOLLOWING SUMMARY: 

Items enclosed in brackets [ ] are optional. 

Items separated by the | symbol are mutually exclusive (one 
or the other but not both must be used). 
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COMPILER DIRECTIVES 


label 

EQU 

10 

label 

EQUATE 

100 


INC 

filename[/ext] 


INCLUDE 

filename [/ext] 

FILE DECLARATIONS 


label 

FILE 


label 

IFILE 


DATA DEFINITIONS 


label 

FORM 

n «m 

label 

FORM 

"456.23" 

label 

DIM 

n 

label 

INIT 

"character string" 

label 

FORM 

*n -m 

label 

FORM 

*"456.23" 

label 

DIM 

*n 

label 

INIT 

*"CHARACTER STRING" 

CONTROL 


GOTO 

(label) 


GOTO 

(label) IF (condition) 


GOTO 

(label) IF NOT (condition) 


BRANCH 

(nvar) OF (label list) 


CALL 

(label) 


CALL 

(label) IF (condition) 


CALL 

RETURN 

(label) IF NOT (condition) 


RETURN 

IF (condition) 


RETURN 

STOP 

IF NOT (condition) 


STOP 

IF (condition) 


STOP 

IF NOT (condition) 


CHAIN 

(sval) 


CHAIN 

(slit) 


TRAP 

(label) IF (event) 


TRAPCLR 

(event) 


ROLLOUT 

(svar) 


ROLLOUT 

(slit) 
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CHARACTER STRING HANDLING 


MATCH 

(svar) 

TO 

(svar) 




MATCH 

(slit) 

TO 

(svar) 




MOVE 

(svar) 

TO 

(svar) 




MOVE 

( slit) 

TO 

(svar) 




MOVE 

(svar) 

TO 

(nvar) 




MOVE 

(nlit) 

TO 

(nvar) 




MOVE 

(nvar) 

TO 

(svar) 




APPEND 

(svar) 

TO 

(svar) 




APPEND 

(slit) 

TO 

(svar) 




APPEND 

(nvar) 

TO 

(svar) 




CMOVE 

(sval) 

TO 

(svar) 




CMATCH 

(sval) 

TO 

(sval) 




BUMP 

, (svar) 






BUMP 

(svar) 

BY 

(nlit) 




RESET 

(svar) 

TO 

(sval) 




RESET 

(svar) 

TO 

(nvar) 




RESET 

(svar) 






ENDSET 

(svar) 






LENSET 

(svar) 






CLEAR 

(svar) 






EXTEND 

(svar) 






LOAD 

(svar) 

FROM (nvar) 

OF 

(slist) 


STORE 

(svar) 

INTO (nvar) 

OF 

(slist) 


STORE 

(slit) 

INTO (nvar) 

OF 

(slist) 


CLOCK 

TIME TO (svar) 




CLOCK 

DAY TO 

(svar) 




CLOCK 

YEAR TO (svar) 




TYPE 

(svar) 






SEARCH 

(nvar) 

IN 

(nlist) 

TO 

(nvar) WITH 

(nvar) 

SEARCH 

( svar) 

IN 

(slist) 

TO 

(nvar) USING 

(nvar) 

REPLACE 

(svar) 

IN 

(svar) 




REP 

( slit) 

IN 

(svar) 





A—4 


2200 DATASHARE 3 



ARITHMETIC 


ADD (nvar) TO (nvar) 

ADD (nlit) TO (nvar) 

SUB (nvar) FROM (nvar) 

SUB (nlit) FROM (nvar) 

SUBTRACT (nlit|nvar) FROM (nvar) 

MULT (nvar) BY (nvar) 

MULT (nlit) BY (nvar) 

MULTIPLY (nlit|nvar) BY (nvar) 

DIV (nvar) INTO (nvar) 

DIV (nlit) INTO (nvar) 

DIVIDE (nlit|nvar) INTO (nvar) 

MOVE (nvar) TO (nvar) 

MOVE (nlit) TO (nvar) 

COMPARE (nvar) TO (nvar) 

COMPARE (nlit) TO (nvar) 

LOAD (nvar) FROM (nvar) OF (nlist) 

STORE (nvar) INTO (nvar) OF (nlist) 

STORE (nlit) INTO (nvar) OR (nlist) 

CHECKll (svar) BY (svar) 

CKll (svar) BY (slit) 

CHECK10 (svar) BY (svar) 

CK10 (svar) BY (slit) 

INPUT/OUTPUT 


KEYIN 

(list) 

DISPLAY 

(list) 

BEEP 


PRINT 

(list) 

PREPARE 

(file),(svar|slit) 

PREP 

(file) , (svar|slit) 

OPEN 

(file|ifile)»(svar|slit) 

CLOSE 

(file|ifile) 

WRITE 

(file(ifile),rn|seq|key[;[(list) ] [;]) 

WRITAB 

(file)»rn|seq;(list)[;] 

WEOF 

(file|ifile), rn | seq 

UPDATE 

(ifile)[;[(list)][;]] 

READ 

(file|ifile),rn|seq|key|nul;(;|(list[;])) 

READKS 

(ifile);(;|(list[?])) 

DELETE 

(ifile),(svar) 

INSERT 

(ifile),(svar) 
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APPENDIX B. INPUT/OUTPUT LIST CONTROLS 


CONTROL USED IN FUNCTION 

*P<m>:<n> KDC Causes the cursor to be positioned 

horizontally and vertically to the column 
and line indicated by the numbers <m> 
(horizontal 1-80) and <n> (vertical 1-24). 
These numbers may' either be literals or 
numeric variables. Note that <n> is 
ignored in the CONSOLE statement. This 
list control is only effective on the 
Datapoint 3502. 


*N 


*EL 

*EF 


*ES 


KDP Causes the cursor or printer to be 

positioned in Column 1 of the next line. 

KDC Causes the line to be erased from the 
current cursor position. 

KDC Causes the screen to be erased from the 

current cursor position to the end of the 
line. 

KD Causes the cursor to be positioned at 

horizontal position 1 of the top row of 
the display and the entire display to be 
erased. 


*EOFF 

*EON 
* + 


* + 


K Causes the echo during input operations 

from the terminal to be defeated- 

K Causes the echo during input operations 

from the terminal to be on- 

KDCP Turn on Keyin Continuous for KEYIN or 

space after logical length suppression for 
DISPLAY, PRINT, and CONSOLE. 

w Turn on space compression during WRITE- 


KDCP Turn off Keyin Continuous (turned off at 
the end of the statement) or the space 
after logical length suppression- 
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*_ 

W 

Turn off space compression during WRITE. 

*<n> 

P 

Causes a horizontal tab on the printer to 
the column indicated by the number <n>. 

No action occurs if the carriage is past 
the column indicated by <n>. 

*<n> 

*<nvar> 

RW 

Tab specification for READ or WRITAB 
operations; the logical file pointers are 
moved to that character position relative 
to the current physical record. 

/ 

KDP 

Suppress a new line function when 
occurring at the end of a list. 

H 

KDCP 

Any characters appearing between quotes 
are displayed or printed when encountered 
(note that to quote a quote requires the 
use of the forcing character)• 

*F 

P 

Causes the printer to be positioned to the 
top of form. 

*L 

KDP 

Causes a linefeed to be displayed or 
printed• 

*c 

KDP 

Causes a carriage return to be displayed 
or printed. 

*T 

K 

Time out after 2 seconds for KEYIN 
statement* 

*W 

KD 

Pause for one second. 

* JL 

K 

Left justify numeric variable and zero 
fill at right if there is no decimal 
point. Left justify string variable and 
blank (or zero if *ZF option is given) 
fill to ETX. 

* JR 

K 

Right justify string variable and blank 
(or zero if *ZF option is given) fill at 
left • 

* ZF 

K 

Zero fill instead of blank fill string 


variable. 

PW Left zero fill numeric variable. 
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*DE 

*IT 

*IN 

*MP 


K Restrict string input to digits (0-9) 

only. 

K Set Text-input mode. (3601 only) 

K Clear Text-input mode. (3601 only) 

W Convert numeric variable to minus 

overpunch format. 
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APPENDIX C. PROGRAM EXAMPLES 


Simple ANSWER Program 


. SIMPLE ANSWER PROGRAM 

• 

PORTN FORM "4" 

IDCODE DIM 9 
ID INIT "DATAPOINT" 

DISPLAY *ES,"D ATASHARE PORT ",PORTN," ON LINE" 
CONSOLE "ANSWER",PORTN 
LOOP KEYIN "ID: " , IDCODE. 

MATCH ID TO IDCODE 
GOTO BADID IF NOT EQUAL 
GOTO BADID IF LESS 
MATCH IDCODE TO ID 
GOTO BADID IF LESS 
STOP 

BADID DISPLAY "*** INVALID ID ***" 

GOTO LOOP 


Simple MASTER Program 


. SIMPLE MASTER PROGRAM 

• 

PORTN FORM "4" 

FILNAM DIM 8 

• 

RELEASE 

CONSOLE "MASTER",PORTN 

LOOP KEYIN *N,*EL,"PROGRAM NAME: ",FILNAM 
TRAP NONAME IF CFAIL 
CHAIN FILNAM 

NONAME DISPLAY "*** NO SUCH PROGRAM ***" 
GOTO LOOP 
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Complex ANSWER Program 


. DATASHARE ANSWER PROGRAM 


SYSFILE 

FILE 

FILE 

DECLARATION 

DAYFILE 

FILE 

FILE 

DECLARATION 

PORTN 

FORM 

"3" THE 

NUMBER OF THIS PORT 

DATE 

DIM 

18 TODAY'S DATE IN MONTH, DAY, 

IDCODE 

DIM 

10 


IDCTR 

FORM 

"3 " 


TIMEON 

DIM 

8 


NFEB 

FORM 

"29" 


RN 

FORM 

"000" 


TIME 

INIT 

"00: 00:00 " 


DAY 

INIT 

"000" 


YEAR 

INIT 

"00" 


NDAYl 

FORM 

3 


NDAY2 

FORM 

3 


NYEAR1 

FORM 

2 


NYEAR2 

FORM 

2 


LINE 

DIM 

100 


• 

DISPLAY 

*ES,*N,"D A T A S H 

ARE PORT ",PORTN; 


OPEN 

SYSFILE,"SYSFILE" 



CONSOLE 

*EL,"ANSWER",PORTN 


STARTO 

CLOCK 

DAY TO DAY 



MOVE 

DAY TO NDAYl 



CLOCK 

TIME TO TIME 



CLOCK 

YEAR TO YEAR 



MOVE 

NDAYl TO NDAYl 



GOTO 

NODATE IF ZERO 



MOVE 

YEAR TO NYEARl 



MOVE 

NYEARl TO NYEAR2 



DIV 

"4" INTO NYEARl 



MULT 

"4" BY NYEARl 



COMPARE 

NYEARl TO NYEAR2 



GOTO 

LEAP IF EQUAL 



MOVE 

"28" TO NFEB 


LEAP 

SUB 

"31" FROM NDAYl 



GOTO 

JAN IF LESS 



GOTO 

JAN IF EQUAL 



SUB 

NFEB FROM NDAYl 



GOTO 

FEB IF LESS 



GOTO 

FEB IF EQUAL 



SUB 

"31" FROM NDAYl 



GOTO 

MAR IF LESS 
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GOTO 

MAR IF EQUAL 



SUB 

"SO" FROM NDAYl 



GOTO 

APR IF LESS 



GOTO 

APR IF EQUAL 



SUB 

"31" FROM NDAY1 



GOTO 

MAY IF LESS 



GOTO 

MAY IF EQUAL 



SUB 

"30" FROM NDAYl 



GOTO 

JUN IF LESS 



GOTO 

JUN IF EQUAL 



SUB 

"31" FROM NDAYl 



GOTO 

JUL IF LESS 



GOTO 

JUL IF EQUAL 



SUB 

"31" FROM NDAYl 



GOTO 

AUG IF LESS 



GOTO 

AUG IF EQUAL 



SUB 

"30" FROM NDAYl 



GOTO 

SEP IF LESS 



GOTO 

SEP IF EQUAL 



SUB 

"31" FROM NDAYl 



GOTO 

OCT IF LESS 



GOTO 

OCT IF EQUAL 



SUB 

"30" FROM NDAYl 



GOTO 

NOV IF LESS 



GOTO 

NOV IF EQUAL 



MOVE 

"DECEMBER" TO DATE 



GOTO 

STARTl 


• 

NOV 

ADD 

"30" TO NDAYl 



MOVE 

"NOVEMBER" TO DATE 



GOTO 

STARTl 


• 

OCT 

ADD 

"31" TO NDAYl 



MOVE 

"OCTOBER" TO DATE 



GOTO 

STARTl 


• 

SEP 

ADD 

"30" TO NDAYl 



MOVE 

"SEPTEMBER" TO DATE 



GOTO 

STARTl 


• 

AUG 

ADD 

"31" TO NDAYl 



MOVE 

"AUGUST" TO DATE 



GOTO 

STARTl 


• 

JUL 

ADD 

"31" TO NDAYl 



MOVE 

"JULY" TO DATE 



GOTO 

STARTl 
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JUN 

ADD 

M 30" TO NDAYl 


MOVE 

"JUNE" TO DATE 


GOTO 

START1 

MAY 

ADD 

"31" TO NDAYl 


MOVE 

"MAY" TO DATE 


GOTO 

START1 

• 

APR 

ADD 

"30" TO NDAYl 


MOVE 

"APRIL" TO DATE 


GOTO 

START1 

• 

MAR 

ADD 

"31" TO NDAYl 


MOVE 

"MARCH" TO DATE 


GOTO 

START1 

FEB 

ADD 

NFEB TO NDAYl 


MOVE 

"FEBRUARY" TO DATE 


GOTO 

START1 

• 

JAN 

ADD 

"31" TO NDAYl 


MOVE 

"JANUARY" TO DATE 

• 

START1 

ENDSET 

DATE 


MOVE 

NDAYl TO DAY 


COMPARE 

"10" TO NDAYl 


GOTO 

START2 IF NOT LESS 


BUMP 

DAY 

START2 

APPEND 

DAY TO DATE 


APPEND 

", 19" TO DATE 


APPEND 

YEAR TO DATE 


RESET 

DATE 


DISPLAY 

*+," ON LINE AT ",TIME," ON ",DATE 


GOTO 

DATEOK 

• 

NODATE 

DISPLAY 

BEEP 

" ON LINE 


DISPLAY 

"*** DATE NOT INITIALIZED ***" 

DATEOK 

DISPLAY 

II II 


TRAP 

LOOP1 IF 10 


OPEN 

DAYFILE,"DAYFILE" 


MOVE 

"0" TO RN 

LOOPO 

READ 

DAYFILE,RN;LINE 


CMATCH 

"9" TO LINE 


GOTO 

LOOP1 IF EQUAL 


RESET 

LINE TO 72 
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LOOPOA 

BUMP 

LINE BY -1 


GOTO 

LOOPOB IF EOS 


CMATCH 

" " TO LINE 


GOTO 

LOOPOA IF EQUAL 

LOOPOB 

LENSET 

LINE 


RESET 

LINE 


DISPLAY 

*+,LINE 


ADD 

"1" TO RN 


GOTO 

LOOPO 

• 

LOO PI 

KEYIN 

*EL,"PLEASE LOG IN: ",*N,IDCODE: 

*C, ************ , *c , "OOOOOOOOOO" 


CLOCK 

TIME TO TIMEON 


CONSOLE 

*P15:1,*EL,"ID: ",IDCODE," TIME ON: ",TIMEON 


MOVE 

IDCTR TO IDCTR 


GOTO 

KABOOM IF ZERO 


MOVE 

EIGHT TO RN 

LOOP 2 

READ 

SYSFILE,RN;LINE 


CMATCH 

" " TO LINE 


GOTO 

IDFAIL IF EQUAL 

LOOP 3 

CMATCH 

IDCODE TO LINE 


GOTO 

NEXTID IF NOT EQUAL 


BUMP 

LINE 


BUMP 

IDCODE 


GOTO 

LOOP3 IF NOT EOS 


CMATCH 

" " TO LINE 


GOTO 

NEXTID IF NOT EQUAL 


SUB 

"1" FROM PORTN 


WRITE 

SYSFILE,PORTN;RN,DATE,TIME 


CLOSE 

STOP 

SYSFILE 

• 

NEXTID 

ADD 

"4" TO RN 


GOTO 

L00P2 

IDFAIL 

BEEP 

DISPLAY 

"*** INVALID ID ***" 


SUB 

"1" FROM IDCTR 


GOTO 

LOO PI 

• 

KABOOM 

CONSOLE 

BEEP 

*P60:1,*EL,"ID OVERRUN" 


DISPLAY 

"*** INVALID ID ***" 


GOTO 

L00P1 
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Complex MASTER Program 

• 

. DATASHARE MASTER PROGRAM 

• 

SYSFILE 

FILE 

FILE DECLARATION 

PORTN 

FORM 

"3" THE NUMBER OF THIS PORT 

ANSWER 

INIT 

"ANSWERX " 

LINE 

DIM 

100 

LINITM 

DIM 

10 

RN 

FORM 

"000 " 

RNX 

FORM 

"000" 

ONE 

FORM 

ii ^ H 

FOUR 

FORM 

■I ^ ii 

EIGHT 

FORM 

iigi. 

NINE 

FORM 

" 9 " 

TEN 

FORM 

"10" 

COUNT 

FORM 

"00 " 

CMDLIN 

DIM 

20 

HELP 

INIT 

"HELP" 

HELLO 

INIT 

"HELLO" 

CAT 

INIT 

"CAT" 

RUN 

INIT 

"RUN" 

TIME 

INIT 

"TIME" 

DATE 

INIT 

"DATE" 

ONLINE 

INIT 

"ONLINE" 

PORT 

INIT 

"PORT" 

BYE 

INIT 

"BYE" 


RELEASE 



CONSOLE 

"MASTER",PORTN," " 


DISPLAY 

*ES 


OPEN 

SYSFILE,"SYSFILE" 


SUB 

ONE FROM PORTN 


READ 

SYSFILE,PORTN;RN 

CMDREQ 

KEYIN 

*ES,*N,"READY",*N,CMDLIN 

TRYAGN 

MATCH 

HELP TO CMDLIN 


GOTO 

HELPI IF EQUAL 


MATCH 

HELLO TO CMDLIN 


GOTO 

HELLOI IF EQUAL 


MATCH 

CAT TO CMDLIN 


GOTO 

CATI IF EQUAL 


MATCH 

PORT TO CMDLIN 


GOTO 

PORTI IF EQUAL 


MATCH 

TIME TO CMDLIN 


GOTO 

TIMEI IF EQUAL 


MATCH 

DATE TO CMDLIN 
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GOTO 

DATEI IF EQUAL 


MATCH 

ONLINE TO CMDLIN 


GOTO 

ONLI IF EQUAL 


MATCH 

BYE TO CMDLIN 


GOTO 

BYEI IF EQUAL 


MATCH 

RUN TO CMDLIN 


GOTO 

TRYNAM IF NOT EQUAL 


CALL 

GETNAM 

TRYNAM 

TRAP 

CFAIL IF CFAIL 


CLOSE 

SYSFILE 


CHAIN 

CMDLIN 

• 

CFAIL 

OPEN 

SYSFILE,"SYSFILE" 


KEY IN 

*N,"WHAT?",*N,CMDLIN 


GOTO 

TRYAGN 

GETNAM 

BUMP 

CMDLIN 


RETURN 

IF EOS 


CMATCH 

"0" TO CMDLIN 


GOTO 

GETEXX IF LESS 


CMATCH 

"TO CMDLIN 


GOTO 

GETNAM IF LESS 


CMATCH 

"A" TO CMDLIN 


GOTO 

GETEXX IF LESS 


CMATCH 

"[" TO CMDLIN 


GOTO 

GETNAM IF LESS 

GETEXX 

BUMP 

RETURN 

CMDLIN 

• ' 

HELPI 

KEYIN 

*ES,*N: 

"ENTER: HELLO-<ID> 

USER", 

*N: 

" HELP 

" CAT 

PROGRAMS",*N: 

" TIME 

" DATE 

" ONLINE 

" PORT 

USED", 

*N: 

" RUN-<NAME> 

" OR <NAME> 

"READY",*N,CMDLIN,* 


GOTO 

TRYAGN 

• 

HELLOI 

CALL 

GETNAM 


MOVE 

CMDLIN TO LINITM 


TO SIGN ON AS ANOTHER 

TO GET THIS INFORMATION", 
TO GET A LIST OF 

TO GET THE CURRENT TIME", 

TO GET THE DATE AT LOGON" 

TO GET THE TIME AT LOGON" 

TO GET THE PORT BEING 

TO RUN A PROGRAM",*N: 

TO RUN A PROGRAM",*N,*N: 
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MOVE 

HELLO2 READ 

CMATCH 

GOTO 

HELLO3 CMATCH 
GOTO 
BUMP 
BUMP 
GOTO 
CMATCH 
GOTO 
READ 
WRITE 
MOVE 
GOTO 


EIGHT TO RNX 
SYSFILE r RNX;LINE 
" " TO LINE 
IDFAIL IF EQUAL 
LINITM TO LINE 
NEXTID IF NOT EQUAL 
LINE 
LINITM 

HELLO3 IF NOT EOS 

"," TO LINE 

NEXTID IF NOT EQUAL 

SYSFILE,PORTN;RN,LINE 

SYSFILE,PORTN;RNX,LINE 

RNX TO RN 

CMDREQ 


NEXTID ADD 
GOTO 


"4" TO RNX 
HELL02 


IDFAIL BEEP 

KEYIN "*** INVALID ID ***",*N,"READY",*N,CMDLIN,*ES 
GOTO TRYAGN 


CAT I 


CATR 

CATRl 


CATR 3 


CATRA 

CATRB 


DISPLAY 

*ES,*N,"CATALOG: " 

MOVE 

RN TO RNX 

READ 

SYSFILE,RNX;LINE 

RESET 

LINE TO 11 

MOVE 

"9" TO COUNT 

GOTO 

CATRl 

READ 

SYSFILE,RNX;LINE 

MOVE 

TEN TO COUNT 

RESET 

LINITM TO 99 

LENSET 

LINITM 

RESET 

LINITM 

CMATCH 

" " TO LINE 

GOTO 

CATR4 IF EQUAL 

CMOVE 

!LINE TO LINITM 

BUMP 

LINE 

BUMP 

LINITM 

GOTO 

CATR3 IF NOT EOS 

GOTO 

CATRB 

BUMP 

LINITM BY -1 

CMATCH 

LINITM TO " " 

GOTO 

CATRA IF EQUAL 

LENSET 

LINITM 

RESET 

LINITM 

DISPLAY 

*+,LINITM 
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SUB 

ONE FROM COUNT 


GOTO 

CATR1 IF NOT ZERO 


ADD 

ONE TO RNX 


GOTO 

CATR 

• 

PORTI 

ADD 

ONE TO PORTN 


DISPLAY 

"YOU ARE ON PORT ",PORTN; 


SUB 

ONE FROM PORTN 

CATR4 

KEYIN 

*N,"READY",*N,CMDLIN,*ES 


GOTO 

TRYAGN 

TIMEI 

CLOCK 

TIME TO LINE 


DISPLAY 

*+,"THE TIME IS ",LINE; 


GOTO 

CATR 4 

• 

DATE I 

READ 

SYSFILE,PORTN 7LINE 


RESET 

LINE TO 21 


LENSET 

LINE 


RESET 

LINE TO 4 


MOVE 

LINE TO CMDLIN 


CMATCH 

CMDLIN TO " " 


GOTO 

DATEIN IF EQUAL 


DISPLAY 

* +,"THE DATE AT LOG IN WAS ",CMDLIN? 


GOTO 

CATR 4 

DATEIN 

DISPLAY 

"*** DATE NOT INITIALZIED ***"; 


GOTO 

CATR 4 

ONLI 

READ 

SYSFILE,PORTN;LINE 


RESET 

LINE TO 29 


LENSET 

LINE 


RESET 

LINE TO 22 


MOVE 

LINE TO CMDLIN 


DISPLAY 

*+,"THE TIME AT LOG IN WAS ",CMDLIN; 


GOTO 

CATR 4 

• 

BYEI 

CLOCK 

TIME TO LINE 


DISPLAY 

*+,"LOGGED OFF AT ",LINE 

BYEE 

KEYIN 

CMDLIN 


RESET 

ANSWER TO 6 


ADD 

ONE TO PORTN 


MOVE 

PORTN TO CMDLIN 


SUB 

ONE FROM PORTN 


APPEND 

CMDLIN TO ANSWER 


RESET 

ANSWER 


TRAP 

AFAIL IF CFAIL 


CHAIN 

ANSWER 

AFAIL 

GOTO 

BYEE 
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APPENDIX D. FILE ACCESS LOCKOUT PROGRAM EXAMPLE 


. FILE ACCESS LOCKOUT EXAMPLE 


DATAFILE 

I FILE 


QTYONH 

FORM 

"0000" 

QTYONHS 

FORM 

"0000" 

QTYWD 

FORM 

"0000" 

KEY 

DIM 

10 

• 

OPEN 

* 

DATAFILE,"DATAFILE" 

TRYAGN 

* 

READ 

DATAFILE,KEY ? *2 0,QTYONH; 


MOVE 

QTYONH TO QTYONHS 


DISPLAY 

"QUANTITY ON HAND: ",QTYONH 


KEYIN 

"QUANTITY TO WITHDRAW: ",QTYWD 


SUB 

QTYWD FROM QTHONH 


GOTO 

ERROR IF LESS 


GOTO 

ERROR IF OVER 


PI 

5 


READ 

DATAFILE,NULL?*20,QTYONH; 


COMPARE 

QTYONH TO QTYONHS 


GOTO 

TRYAGN IF NOT EQUAL 


SUB 

QTYWD FROM QTYONH 


UPDATE 

/ 

DATAFILE ? *20,QTYONH 
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APPENDIX E. ERROR CODES 


If an event occurs and the trap corresponding to that event 
has not been set, the message: 

* ERROR * LLLLL X * or 

* ERROR * LLLLL X * Q 

appears on the console display. The first form appears for all 
traps except I/O traps. In the event of an I/O trap, a 
qualification letter is given where a "Q" is shown in the example 
(explained below under the "I/O" trap)-. The LLLLL is the current 
value of the program counter and the X is an error letter. In 
most cases, LLLLL points to the instruction following the one that 
caused the problem- However, in certain I/O errors, LLLLL will 
point after the list item where the problem occurred. The 
following error letters can appear: 

P - parity failure 
R - record number out of range 

F - record format error 

C - chain failure 

I - I/O error 

B - illegal operation code 
U - call stack underflow or overflow 
A - interruptions already prevented 

Note that the last three items shown above cannot be trapped. The 
B error will only show up if somehow an invalid object file is 
executed or if the system is failing. The U error will happen if 
the programmer forgets to perform a call or in some other fashion 
manages to execute a RETURN instruction without a corresponding 
CALL having been previously executed, or calls are nested more 
than eight levels deep- The A error will happen if a PI 
instruction is executed while interrupts are currently prevented. 
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The events 
capitalized name 

PARITY 

RANGE 

FORMAT 


CFAIL 

10 


E-2 


that may be trapped are shown below. The 
is the one used in the TRAP statement. 

- disk CRC error during READ or disk CRC error 
during write verification (the DOS retries an 
operation up to 5 times to get a good CRC 
before giving up and causing this event). 

- record number out of range (an access was 
made that was off the physical end of the file, 
a record was read which was never written, or a 
WRITAB was used on record which was never 
written) 

- data being read into a numeric variable was 
not all digits and decimal point and minus 
sign, or decimal point in input does not agree 
with the decimal point in FORM, or data from 
disk has a negative multi-punch but no room for 
a minus sign in FORM, or write specified 
multi-punch and the last item of the field is a 
decimal point. The operation stops with the 
item in error and the statement is aborted. 

- the specified program was not in the DOS 
directory or a ROLLOUT was attempted with one 
of the necessary system files missing, or a 
program containing compile-time errors was 
loaded. 

- Error during I/O statement. Either a 
programming error or disk failure can cause 
this TRAP. See Appendix F* 
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APPENDIX F. INTERPRETER I/O TRAP CODES 


A - an access sequentially by key was attempted before any indexed 
sequential access was made using the logical file. 

B - the READ mechanism ran off the end of a sector without 
encountering a physical end of record character (003). 

C - an operation on a closed logical file was attempted. 

D - a non-READ non-DELETE indexed sequential operation was 

attempted where the specified key already exists in the index. 

E - an EOF mark without at least four zero's was encountered. 

I - the index file specified in an OPEN statement does not exist 
on the specified drive(s). 

J - the index file found by the OPEN statement does not reside in 
the correct physical location on the disk (index files may 
never be moved, they must always be re-created). 

K - a null key was supplied in an operation where the key may not 
be null. 

M - the data file specified in the OPEN statement does not exist 
on the specified drive(s). 

N - the data file name specified in the OPEN or PREPARE statement 
was null. 

0 - the index file name specified in the OPEN statement was null. 

P - the file specified in the PREPARE statement had some type of 
DOS protection (either write, delete, or both). 

T - the tab value in the READ or WRITAB statement was off the end 
of the sector. 

U - an EOF mark was encountered while a record was being deleted 
in the indexed sequential file. 

V - one of the indexed sequential access overlays (DS/OVl, DS/OV2, 

or DS/OV3) could not be loaded by the DOS loader. 

W - an index file pointer sector could not be read. 

X - an index file header sector could not be read. 

Y - the R.I.B. of the data file pointed to by the index file could 

not be read. (VWXY errors can be caused by parity errors, the 
drive being switched off line, or the disk cartridge being 
swapped with another while an operation is taking place.) 
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APPENDIX G. UNSUPPORTED FEATURES 


The four 2200 DATASHARE's do not support all of the features 
of the DATABUS language as defined in the DATABUS COMPILER manual. 
The maximum program size is limited to 16K, and the following 
unsupported features are listed by interpreter: 


DS3A3360 and DS3B3360 

KEYIN *IN , *IT i *ZF, *JL, *JR, and *R controls 

DISPLAY *R control not supported 
PRINT *ZF control not supported 

CHECK No check digit verbs (CK10, CK11) 

SEARCH The Search verb is not supported 
REPLACE The Replace verb is not supported 
READ The READ scanner will not accept multi-punches 

WRITE No *ZF or *MP controls supported 


DS3A3600 and DS3B3600 

KEYIN *ZF, *JLi and *JR not supported 

PRINT *ZF control not supported 

CHECK No check digit verbs (CK10, CK11) 

SEARCH The search verb is not supported 
replace The Replace verb is not supported 
READ The READ scanner will not accept multi-punches 

WRITE No *ZF or *MP controls supported. 
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